<?

//Initiate Authenticate
SecurityRedirect();
//error_reporting(E_ALL);

/*
echo "<pre>";
print_r($_REQUEST);
echo "</pre>";
*/


//initiate Vars
define("PRIMARY_KEY","jo_id");
$FileName       = "ais_transaction_jo_preparation_nd.php";
$FileTemplate   = "ais_transaction_jo_preparation_nd_readonly_form.html";
$SubHeaderTitle = "View Job Order Preparation Debit Note";
$TableName      = "tbljoborder";
$HTMLFormName   = "JOForm";
$PRIMARY_KEY    = PRIMARY_KEY;
$PRIMARY_VALUE  = GetParam($PRIMARY_KEY,"");
$created_by     = $_SESSION['AISUser'];

$MaxGrid        = "20";
$KTRASL                = GetOfficeID();
//$HTMLFormName2  = "BudgetForm";

$FormAction    = $FileName . "?" . AddParam(GetQueryString("QueryString", ""),"form","$HTMLFormName");
$FormEncType   = "application/x-www-form-urlencoded";
//$PMode         = "";

//Initiate Grid Fields;
$FormFields    = array("jo_id"=>"","jo_code"=>"","doc_ref"=>"","project_id"=>"","debtur"=>"","staff_id"=>"","jo_date"=>"date","rbt_idr"=>"","rbt_usd"=>"","rat_idr"=>"","rat_usd"=>"","jo_status"=>"","jo_appv_status"=>"");
buildsqlfield ("$TableName", $FormFields);


//Variable declaration
$jo_id = GetParam("jo_id","");
$project_id = GetParam("project_id","");


$act_id_bill_arr = $_REQUEST['act_id_bill']; //var act_id_bill in array
$act_id_arr = $_REQUEST['act_id_var']; //var act_id in array



list($day,$month,$year) = explode("/",GetParam("jo_date",""));
$jo_date  = "$year-$month-$day";

$today = date("Y-m-d");

//End Variable declaration


//buildsqlfield ("$TableName", $FormFields);

//Leave Here Untouch
$FormCName     = BuildHTMLField($FormFields,"name");
$FormCValue    = BuildHTMLField($FormFields,"value");
$FormHName     = BuildHTMLField($FormFields,"name",1);
$FormHValue    = BuildHTMLField($FormFields,"value",1);

//************ FORM ACTION **************


if (trim(GetParam("form",""))==trim($HTMLFormName)) {
    if (GetParam("FormAction","")=="Save") {

        if (trim($jo_id)=="AUTO NUMBERED BY SYSTEM")
        {
           SetLogActivity($TransNo,"Create","");
        }

        else
        {            
            $DBConnection->dbc->query("DELETE FROM tbljoactivity WHERE jo_id='".$jo_id."'");
            FormSave("tbljoactivity", "qty", array("jo_id"=>"","services_id"=>"","disburgement"=>"","qty"=>"","unit"=>"","curr"=>"","rate"=>"number","amount"=>"number","base_amount"=>"number","tax_rate"=>"","tax_amount"=>"number","tax_amount_usd"=>"number","total_amount"=>"number","total_amount_usd"=>"number","payment_status_id"=>"","dev_after_tax"=>"number","mul_after_tax"=>"number","nibt"=>"number","niat"=>"number", "bill_to" => "","bill_nd" => ""),"","jo_id",$jo_id);
            $DBConnection->InsertGrid();
            SetLogActivity($TransNo,"Update","");
        }
        
        //header("Location: $FileName?PageMode=FormReadOnly&jo_id=$jo_id");        
        
        redirectMeta($FileName."?PageMode=FormReadOnly&jo_id=".$jo_id);
        exit;
    }
    
    
    if (GetParam("FormAction","")=="Delete") {
//      print "Deleted"."<br>\n";
                $SQL = "DELETE FROM tbljoborder WHERE jo_id='".GetParam("jo_id","")."'";
                $DBConnection->dbc->query($SQL);
                $SQL = "DELETE FROM tbljoactivity WHERE jo_id='".GetParam("jo_id","")."'";
                $DBConnection->dbc->query($SQL);
                SetLogActivity($TransNo,"Delete","");
        header("Location: $FileName?PageMode=Form");
        exit;
    }

}



//Field Verification
$Verification  = "False";
$SessionVar    = md5(microtime());
//$SessionVar    = "Stuck";



$VerifyFields = array();

VerifyHTML ($HTMLFormName,$VerifyFields,$SessionVar);


$InitFunction = "Masking();Masking2();";

$VerifyGrids = array();
$Masking1 = BuildMasking ($HTMLFormName,MutatorFields($FormFields,($MaxGrid+$Count)));
$Masking2 = BuildMasking ($HTMLFormName,array(),"2");
$JSMasks  = $Masking1.$Masking2;
Init($SessionVar,$JSMasks);
FormGridHTML ($HTMLFormName,$VerifyGrids,$Count,$MaxGrid,$SessionVar);



//************ SET FORM MODE ***************
$USER_CANPRINT_TAX="0";

if (GetParam(PRIMARY_KEY,"")) {
        $FormMode = "Edit";
        $USER_CANPRINT="1";
        $SQL ="SELECT vat FROM ais_memorial WHERE nobkt='".GetParam(PRIMARY_KEY,"")."' AND urut=999 ";
        if (strlen($DBConnection->dbc->get_var($SQL))) $USER_CANPRINT_TAX="1";
} else {
        $FormMode = "Add";
        $USER_CANPRINT="0";
}


//******* DATABASE GRID QUERY ***********

$SQL = "SELECT ".BuildFields($FormFields)." FROM `$TableName`";
if (GetParam(PRIMARY_KEY,"") && $FormMode="Edit") {
    $SQL      = $SQL."WHERE ".PRIMARY_KEY." ='".GetParam(PRIMARY_KEY,"")."'";
    $SQL     .= " AND ktrasl='".GetOfficeID()."'";
    $SQLGrid  = $SQL." ORDER BY urut";
}


//******* SHOW FORM CONTENT *********
$TBS = new clsTinyButStrong ;
$TBS->LoadTemplate($MOD_TEMPLATE_DIR."/".$FileTemplate);

//********************************* HTML Header ******************************************

//Select Currency Table
$SQLCurr = "SELECT * FROM tblcurrency";
//Select Department:
$SQLDept = "SELECT * FROM tbldept";
//Select Receipt:
$SQLReceipt = "SELECT * FROM tblreceipt";
//Select Bank:
$SQLBank = "SELECT * FROM tblbank ORDER BY banknam";
//Select Kantor
$SQLKtr  = "SELECT * FROM tblkantor ORDER BY ktrasl";
//$SQLLocation = "SELECT * FROM $DBCoins.tblsubdepo ORDER BY sdname ";

$SQLUnit  = "SELECT  * FROM tblunit ORDER BY id";

$SQLPaymentStatus  = "SELECT  * FROM tbljopayment_status ORDER BY payment_status_id";

$SQLTaxRate  = "SELECT  * FROM tbltaxrate WHERE tax_group = 'revenue' ORDER BY tax_id";

$SQLCargoType  = "SELECT  * FROM tblcargotype ORDER BY cargo_id ASC";



//edited by Adit van Smith



//GET Kurs

$SQLGetKurs = "SELECT * FROM ais_kurssi WHERE curr = 'USD' ORDER BY tglbkt DESC";
$ResultGetKurs  = $DBConnection->dbc->get_row($SQLGetKurs,ARRAY_A);   

$kursUSD = $ResultGetKurs['rate'];


$SQLGetKursTax = "SELECT * FROM ais_kurspjk WHERE curr = 'USD' ORDER BY tglbkt DESC";
$ResultGetKursTax  = $DBConnection->dbc->get_row($SQLGetKursTax,ARRAY_A);   

$kursUSDTax = $ResultGetKursTax['rate'];

//END GET Kurs






//Project Get Header

if(GetParam(PRIMARY_KEY,"") != '' && GetParam(PRIMARY_KEY,"") != 'AUTO NUMBERED BY SYSTEM')
{

   $SQLProject = "SELECT a.*,b.*,c.*,d.*, e.nama as operation_staff_name, 
            if(a.jo_appv_status = 'draft', 'Draft', if(a.jo_appv_status = 'wait_approved', 'Wait for Approval', if(a.jo_appv_status = 'approved', 'Approved', 'No Approval Status'))) as approval_status
            FROM `$TableName` as a ";
   $SQLProject.= "JOIN tblproject as b ON a.project_id = b.project_id ";
   $SQLProject.= "JOIN ".$DBGeneral.".tblstaff as c ON a.staff_id = c.staff_id ";
   $SQLProject.= "JOIN tbldebtur as d ON a.debtur = d.CUCODE ";
   $SQLProject.= "LEFT JOIN ".$DBGeneral.".tblstaff as e on a.operation_staff_id = e.staff_id ";
   $SQLProject.= "WHERE a.".PRIMARY_KEY." ='".GetParam(PRIMARY_KEY,"")."' ORDER BY a.".PRIMARY_KEY." ASC";

   $ResultProject  = $DBConnection->dbc->get_results($SQLProject,ARRAY_A);
   
   if($ResultProject[0]['contract_deal'] == '1')
   {
	  $check_contract = "checked";   
   }
   
   else
   {
	  $check_contract = "";   
   }

}

else
{
   $ResultProject  = array(
      array(

          "jo_id" => "",
         "jo_code" => "",
         "doc_ref" => "",
         "project_id" => "",
         "debtur" => "",
         "staff_id" =>"",
         "jo_date" =>$today,
         "bl_no" => "",
         "invoice_no" => "",
         "vessel" => "",
         "rbt_idr" =>"",
         "rbt_usd" =>"",
         "rat_idr" =>"",
         "rat_usd" =>"",
         "jo_appv_status" =>""

      )
   );

   //SELECT * FROM INFORMATION_SCHEMA.Columns where TABLE_NAME = 'Foo'

}


//Project



$HeaderFields = array("jo_id"=>"","jo_code"=>"","project_id"=>"project_id","debtur"=>"debtur","staff_id"=>"staff_id","jo_date"=>"date","rbt_idr"=>"","rbt_usd"=>"","rat_idr"=>"","rat_usd"=>"","jo_appv_status" => "");

//Leave Here Untouch
$FormHName     = BuildHTMLField($HeaderFields,"name",1);
$FormHValue    = BuildHTMLField($HeaderFields,"value",1);

$SQLHeader     = "SELECT ".BuildFields($HeaderFields)." FROM $TableName ";


if (GetParam(PRIMARY_KEY,"") && $FormMode="Edit") $SQLHeader .= " WHERE ".PRIMARY_KEY."='".GetParam(PRIMARY_KEY,"")."' AND ktrasl='".GetOfficeID()."' AND urut=999 ";
$TBS->MergeBlock("currformblk",$DBMysql,$SQLCurr);

//Edited by Adit van Smith
$SQLCustomer = "SELECT * FROM ".$DBGeneral.".tbldebitur ORDER BY CUNAME ASC";
//End Edited by Adit van Smith

$SQLgetProject = "SELECT * FROM tblproject WHERE assign_to_project = 'assigned' ORDER BY project_name ASC";


// HTML Value
$TBS->MergeBlock("headbln",$FormHName);
$TBS->MergeBlock("headblv",$ResultProject);
$TBS->MergeBlock("dayblk",GetArrayDay());
$TBS->MergeBlock("project",$DBMysql,$SQLgetProject);

$TBS->MergeBlock("customer",$DBMysql,$SQLCustomer);
$TBS->MergeBlock("unit",$DBMysql,$SQLUnit);
$TBS->MergeBlock("paymentStatus",$DBMysql,$SQLPaymentStatus);
$TBS->MergeBlock("taxRate",$DBMysql,$SQLTaxRate);
$TBS->MergeBlock("CargoType",$DBMysql,$SQLCargoType);



//********************************* HTML GRID *********************************************
//HTML Grid


/*
 
 SELECT a.*, b.*, c.*, 
if((SELECT payment_complete FROM tbljoborder_costing WHERE jo_id ='42' AND payment_complete = ' ' LIMIT 1) ,'Checked','') as super_complete 
FROM tbljoactivity as a 
JOIN tblservices as b on a.services_id = b.services_id 
JOIN tbldebtur as c on a.bill_to = c.CUCODE WHERE jo_id ='42' ORDER BY a.act_id

 
*/


$SQLGrid = "SELECT * FROM tbljoactivity as a
            LEFT JOIN tblservices as b on a.services_id = b.services_id 
            LEFT JOIN tbldebtur as c on a.bill_to = c.CUDEBTUR_FIN 
            LEFT JOIN tbljoborder as d on a.jo_id = d.jo_id
            WHERE a.".PRIMARY_KEY." ='".GetParam(PRIMARY_KEY,"")."' ORDER BY a.act_id";

$Result  = $DBConnection->dbc->get_results($SQLGrid,ARRAY_A);
$Result  = BuildEmptyGrid ($FormFields, $MaxGrid, $Result);


$SQLGridCargo = "SELECT * FROM tbljocargo as a
                 WHERE a.".PRIMARY_KEY." ='".GetParam(PRIMARY_KEY,"")."' ORDER BY a.cargo_id";

$ResultCargo  = $DBConnection->dbc->get_results($SQLGridCargo,ARRAY_A);
$ResultCargo  = BuildEmptyGrid ($FormFields, $MaxGrid, $ResultCargo);

$TBS->MergeBlock("blgCargo",$ResultCargo);
$TBS->MergeBlock("blg",$Result);
$TBS->Show();

//*************** ACTION FUNCTION *******************

function redirectMeta($url)
{
	echo "Redirecting.... Please Wait.....";
	echo "<meta http-equiv='refresh' content='0;url=".$url."'>";
}

function jsAlert($msg)
{
	$msg = str_replace("\n","\\n",$msg);
	
	echo '<script>
	      alert("'.$msg.'");	
	      </script>';
}


function FormInsert() {
        global $DBConnection,$FileName;
        $DBConnection->Insert();
        header("Location: $FileName?PageMode=Form");
        exit;
}

function FormUpdate() {
        global $DBConnection;
        $DBConnection->Update();
}

function FormDelete() {
        global $DBConnection,$FileName,$TableName;
        $DBConnection->deleteGrid("$TableName","nobkt");
        header("Location: $FileName");
        exit;
}

function FormSearch () {

}

function FormCancel () {
        global $FileName;
        header("Location: ".$FileName."?PageMode=List");
        exit;
}

function FormSave ($table, $keyField, $FormFields, $SpecialCase="", $PrimaryKey="", $PrimaryKeyVal="",$PrimaryKey_log="", $PrimaryKeyVal_log="") {	    
        global $FileName, $MaxGrid, $DBConnection;
        $TotalData = $MaxGrid * 2;
        $NewDataStart = GetParam("NewData","0");
        $NewDataStart = 1;
        $strError = "";
	    $errorStatus = "";

          

        for ($a=1;$a<=$MaxGrid;$a++) {
	    //Begin For

            
            if (GetParam($keyField.$a,""))
            {
			//Begin Check if Empty Keyfield	
            
                 
                foreach ($FormFields as $key=>$formatting) {
                        
                        if(!empty($PrimaryKeyVal))
                        {                              
                            $value = GetParam($key.$a,"");

                            if ($formatting=="number") $value = str_replace(",","",$value);
                            if ($formatting=="date")
                            {
                                    list($day,$month,$year) = explode("/",$value);
                                    $value = "$year-$month-$day";
                            }
                            //Inser if the key is equal primary key, then set valu = primary header
                            
                            
                                                  
                            if($key == "$PrimaryKey")
                            {
                               $DBConnection->add_data($table,$key,$PrimaryKeyVal);
                            }
                                                                                   
                            else if($key == "$PrimaryKey_log")
                            {
                               $DBConnection->add_data($table,$key,$PrimaryKeyVal_log);
                            }

                            else
                            {
                               //Special Case with another filed name
                               
                               if($key == "bill_to")
                               {                            
								  $value = GetParam("debtur_fin".$a,"");
								  
								 
								  
								  if(empty($value))
								  {
									$value = GetParam("debtur_fin","");   
									$DBConnection->add_data($table,$key,$value);     
								  }
								  
								  else
								  {
								    $DBConnection->add_data($table,$key,$value);   
								  }
								  
							   }
							   
							   
							   else if($key == "bill_nd")
							   {                            
								    
								    if($value == "on")
									{
										  //SET THE PERIMETER ND
											
											$services_id = GetParam("services_id".$a,"");
											$jo_code = GetParam("jo_code".$a,"");
											$jo_id = $PrimaryKeyVal;
											$checkClosed = "";
											
											
											$SQLGetBS = "SELECT * FROM ais_advance WHERE jo_id ='".$jo_id."' AND services_id = '".$services_id."' GROUP BY nobkt ";
											$ResultGetBS  = $DBConnection->dbc->get_results($SQLGetBS,ARRAY_A);
											
											
											
											//FOR BS ONLY											   
											if(!empty($ResultGetBS))
											{
																								
												foreach($ResultGetBS as $id_s => $val_s)
												{
													
													if($val_s['bs_progress'] == "closed")
													{
														$checkClosed = "yes";
													}
																	
												}
												
												if($checkClosed == "yes")
												{
													
													foreach($ResultGetBS as $id => $val)
													{
														
														if($val['bs_progress'] == "bs")
														{
															$strError.= "B/S with code ".$val['nobkt']." Should be Canceled \n";
															$errorStatus = "yes";
														}
														
														else if($val['bs_progress'] == "payment")
														{
															$strError.= "B/S with code ".$val['nobkt']." Should be Finished Immediately \n";
															$errorStatus = "yes";
														}
														
													}
													
													
													
													if(!empty($errorStatus))
													{
														$DBConnection->add_data($table,$key,"");										
													}
													
													else
													{											
														$DBConnection->add_data($table,$key,"set");   
													}
													
												}
												
												else
												{
													$strError.= "There are no B/S that completed yet \n";
													$errorStatus = "yes";
													$DBConnection->add_data($table,$key,""); 
												}
												
												
											}
											
											//FOR AP ONLY
											else
											{												
																								
												//$SQLGetJoId = "SELECT * FROM tbljoborder WHERE jo_code ='".$jo_code."' ";
											    //$ResultGetJoId  = $DBConnection->dbc->get_results($SQLGetJoId,ARRAY_A);
											    
											    //$jo_id = $ResultGetJoId[0]['jo_id'];
											    
											    $SQLGetServ = "SELECT * FROM tblservices WHERE services_id ='".$services_id."' ";
											    $ResultGetServ = $DBConnection->dbc->get_results($SQLGetServ,ARRAY_A);
											    
											    $Serv = $ResultGetServ[0]['services_name'];
											    											    
											    $SQLGetAP = "SELECT * FROM ais_memorial WHERE jo_code ='".$jo_code."' AND services_id = '".$services_id."' GROUP BY nobkt ";
											    $ResultGetAP  = $DBConnection->dbc->get_results($SQLGetAP,ARRAY_A);
											    
											    if(!empty($ResultGetAP))
												{
													$DBConnection->add_data($table,$key,"set"); 													
												}
												
												else
												{
													$strError.= "Services ".$Serv." have no Account Payable \n";
													$errorStatus = "yes";
												}
												
											
											}
										  
										  
										  //SET THE PERIMETER ND
										  
							        }
							        
							        else
							        {
										$DBConnection->add_data($table,$key,"");
									}
								
								  
							   }
							   
							   
							   
							   //Insert ke Remain
							   else if($key == "total_amount")
                               {                            
									$DBConnection->add_data($table,$key,$value);     
									$DBConnection->add_data($table,"joactivity_remain_idr",$value);
							   }
							   
							   else if($key == "total_amount_usd")
                               {                            
									$DBConnection->add_data($table,$key,$value);     
									$DBConnection->add_data($table,"joactivity_remain_usd",$value);
							   }
							   //Insert ke Remain
                               
                               else
                               {
								  $DBConnection->add_data($table,$key,$value);   
							   }
                               
                            }
                           

                        }

                        else
                        {
                            $value = GetParam($key.$a,"");

                            if ($formatting=="number") $value = str_replace(",","",$value);
                            if ($formatting=="date")
                            {
                                    list($day,$month,$year) = explode("/",$value);
                                    $value = "$year-$month-$day";
                            }

                            if($key == "bill_to")
						    {
								
							  $value = GetParam("debtur_fin".$a,"");
								  
							  if(empty($value))
							  {
								$value = GetParam("debtur_fin","");   
								$DBConnection->add_data($table,$key,$value);     
							  }
							  
							  else
							  {
								$DBConnection->add_data($table,$key,$value);   
							  }
							  
						    }
						    
						    
						    else if($key == "bill_nd")
						    {                            
							  
							    if($value == "on")
								{
									  //SET THE PERIMETER ND
										
										$services_id = GetParam("services_id".$a,"");
										$jo_id = $PrimaryKeyVal;
										$checkClosed = "";
																				
										
										$SQLGetBS = "SELECT * FROM ais_advance WHERE jo_id ='".$jo_id."' AND services_id = '".$services_id."' GROUP BY nobkt ";
										$ResultGetBS  = $DBConnection->dbc->get_results($SQLGetBS,ARRAY_A);
										
										//FOR BS ONLY											   
										if(!empty($ResultGetBS))
										{
											foreach($ResultGetBS as $id_s => $val_s)
											{
												
												if($val_s['bs_progress'] == "closed")
												{
													$checkClosed = "yes";
												}
																
											}
											
											if($checkClosed == "yes")
											{
												
												foreach($ResultGetBS as $id => $val)
												{
													
													if($val['bs_progress'] == "bs")
													{
														$strError.= "B/S with code ".$val['nobkt']." Should be Canceled \n";
														$errorStatus = "yes";
													}
													
													else if($val['bs_progress'] == "payment")
													{
														$strError.= "B/S with code ".$val['nobkt']." Should be Finished Immediately \n";
														$errorStatus = "yes";
													}
													
												}
												
												
												
												if(!empty($errorStatus))
												{
													$DBConnection->add_data($table,$key,"");										
												}
												
												else
												{											
													$DBConnection->add_data($table,$key,"set");   
												}
												
											}
											
											else
											{
												$strError.= "There are no B/S that completed yet \n";
											    $errorStatus = "yes";
												$DBConnection->add_data($table,$key,""); 
											}
											
											
										}
										
										//FOR AP ONLY
										else
										{												
																							
											//$SQLGetJoId = "SELECT * FROM tbljoborder WHERE jo_code ='".$jo_code."' ";
											//$ResultGetJoId  = $DBConnection->dbc->get_results($SQLGetJoId,ARRAY_A);
											
											//$jo_id = $ResultGetJoId[0]['jo_id'];
											
											$SQLGetServ = "SELECT * FROM tblservices WHERE services_id ='".$services_id."' ";
											$ResultGetServ = $DBConnection->dbc->get_results($SQLGetServ,ARRAY_A);
											
											$Serv = $ResultGetServ[0]['services_name'];
																							
											$SQLGetAP = "SELECT * FROM ais_memorial WHERE jo_code ='".$jo_code."' AND services_id = '".$services_id."' GROUP BY nobkt ";
											$ResultGetAP  = $DBConnection->dbc->get_results($SQLGetAP,ARRAY_A);
											
											if(!empty($ResultGetAP))
											{
												$DBConnection->add_data($table,$key,"set"); 													
											}
											
											else
											{
												$strError.= "Services ".$Serv." have no Account Payable \n";
												$errorStatus = "yes";
											}
											
										
										}
										
									  
									  //SET THE PERIMETER ND
									  
								}
								
								else
								{
									$DBConnection->add_data($table,$key,"");
								}
							  
						    }
						    
						    
						    //Insert ke Remain
						    else if($key == "total_amount")
						    {                            
								$DBConnection->add_data($table,$key,$value);     
								$DBConnection->add_data($table,"joactivity_remain_idr",$value);
						    }
						   
						    else if($key == "total_amount_usd")
						    {                            
								$DBConnection->add_data($table,$key,$value);     
								$DBConnection->add_data($table,"joactivity_remain_usd",$value);
						    }
						    //Insert ke Remain
						   
						    else
						    {
							  $DBConnection->add_data($table,$key,$value);   
						    }
                            
                           
                        }
                        
                       

                }
                
                $rate = StrToNumber(GetParam("rate",""));
                $jmh  = StrToNumber(GetParam("jumlah".$a,""));

                // Add by Chandra (15 May 2009)
                $cash_type = GetParam("cash_type","");
                //var_dump($cash_type); exit;



                if($cash_type) $DBConnection->add_data($table,'cash_type',$cash_type);
                // end update


                if (strlen($SpecialCase)) 
                {
                        foreach ($SpecialCase as $key => $value) 
                        {
                                //print "add_data($table,$key,$value);<br>";
                                $DBConnection->add_data($table,$key,$value);
                        }
                }

//                print "$a < $NewDataStart<br>";
                if ($a < $NewDataStart) 
                {
                         if (strlen($PrimaryKey)) 
                         {
                            $DBConnection->UpdateGrid($PrimaryKey,GetParam($PrimaryKey.$a,""));
                         } 
                         else 
                         {
                            $DBConnection->UpdateGrid($keyField,GetParam($keyField.$a,""));
                         }
                } 
                
                else 
                {
                        $DBConnection->InsertGrid();
//                        $DBConnection->dbc->debug();
                }
            
            
            //End Check if Empty Keyfield
            }
            
            
        //End For    
        
        //echo "strError Fin ".$a.":".$strError."<br>";
	    //echo "errorStatus Fin ".$a." :".$errorStatus."<br>"; 
        
        }
        
       
        
        if(!empty($errorStatus))
		{
			jsAlert($strError);											
		}
        
        $DBConnection->ClearData();
}

//*************** USER FUNCTION *******************

function buildsqlfield ($table, $arrayfield) {
        global $DBConnection;
        foreach ($arrayfield as $key=>$Formatting) {
            $value = GetParam($key,"");
            if ($Formatting=="date") {
                list($day,$month,$year) = explode("/",$value);
                $value = "$year-$month-$day";
            } elseif ($Formatting=="number") $value = str_replace(",","",$value);
            $DBConnection->add_htmlfield($table,$key,$value);
        }
}


function DeleteRecord ($sequence_name,$PageSize) {
        global $DBConnection,$FileName,$TableName;
        for ($x=1;$x<=$PageSize;$x++) {
                if (GetParam($sequence_name.$x,""))        {
                        $DBConnection->deleteGrid("$TableName","memorial_id",$sequence_name.$x);
            }
        }
}

function BuildFields ($FormFields) {
                global $DBConnection;
                $str = "";
                foreach ($FormFields as $key=>$formatting) {
                        if (strlen($str)) $str .= ",$key";
                        else $str = "$key";
                }
                return $str;
}

function MutatorFields ($FormFields, $MaxGrid) {
                global $DBConnection;
                $array_fields = array();
                for ($x=0;$x<$MaxGrid;$x++) {
                        foreach ($FormFields as $key=>$formatting){
                                $a=$x+1;
                                $array_fields[$key.$a] = "$formatting";
                        }
                }
                return $array_fields;
}

function FlushCustomer ($TableName, $tmp) {
        global $DBConnection;

        if ($tmp) $TEMPORARY = "TEMPORARY";
        $DBC = new mydb(DB_USER, DB_PASSWORD, DB_NAME2, DB_HOST);

        $SQL = "SELECT kodecustomer,nama,cr_term,kdtype FROM customer ";
        if (GetParam("kdtype","")) $SQL .= " WHERE kdtype='".GetParam("kdtype","")."'";
        $MyResult = $DBC->dbc->get_results($SQL,ARRAY_N);
        if (!$MyResult) return false;
         $session_file = substr(md5(time()), 0, 8);
           $session_file = "/tmp/".$session_file.".tmp";
        BufferToFile ($MyResult,$session_file);

        $DBConnection = new mydb(DB_USER, DB_PASSWORD, DB_NAME, DB_HOST);
        $SQL = "DROP TABLE IF EXISTS `$TableName`;";
        $DBConnection->dbc->query($SQL);

        $SQL= "CREATE $TEMPORARY TABLE `$TableName` (
                          `kodecustomer` varchar(20) NOT NULL default '',
                          `nama` varchar(50) default NULL,
                          `cr_term` int(4) default NULL,
                          `kdtype` varchar(20) default NULL
                          )";
        $DBConnection->dbc->query($SQL);

           $SQL = "LOAD DATA INFILE '$session_file' INTO TABLE $TableName FIELDS TERMINATED BY '\t' LINES TERMINATED BY '\n'";
        $DBConnection->dbc->query($SQL);
        unlink($session_file);
        return true;
}

function GetLastDateReport() {
        global $DBConnection;
        list($day,$month,$year) = explode("/",GetParam("tglbkt",""));
        $current_date = "$year-$month-$day";

    $SQL = "DELETE FROM ais_piutang_sisa WHERE aging_date>='$current_date' ";
    if (GetParam("curr","")) $SQL .= " AND curr='".GetParam("curr","")."' ";
        if (GetParam("skada999","")) $SQL .= " AND fromskada = '".GetParam("skada999","")."' ";
    if (GetParam("skada999","")) $SQL .= " AND toskada = '".GetParam("skada999","")."' ";
    $DBConnection->dbc->query($SQL);
    //$DBConnection->dbc->debug();

        $SQL = "SELECT max(aging_date) FROM ais_piutang_sisa WHERE aging_date<='$current_date' ";
        if (GetParam("curr","")) $SQL .= " AND curr='".GetParam("curr","")."' ";
        if (GetParam("skada999","")) $SQL .= " AND fromskada = '".GetParam("skada999","")."' ";
        if (GetParam("skada999","")) $SQL .= " AND toskada = '".GetParam("skada999","")."' ";

        return $DBConnection->dbc->get_var($SQL);
}

function convert_code($code,$digit)
{

    $length = strlen($code);
    $tot_str = $digit - $length;
    $code_edit = "";

    for($i=0;$i < $tot_str; $i++)
    {
        $code_edit.= "0";
    }

    $code_edit.= $code;

    return $code_edit;

}


function numberVal($val)
{
	$value = str_replace(",","",$val);
	return $value;
}


?>
